﻿Public Class clsLhCacheArea
    Public Function update(prod_id As String, status As String, mes_sync_result_into As String) As Integer
        Dim szSql As String = "UPDATE sf.b_lh_cache_area SET mes_sync_result_into = ? "
        szSql &= " WHERE prod_id = ? and status = ? "
        Return DBacs.ExecuteUpdateSql(szSql, -1, mes_sync_result_into, prod_id, status)
    End Function
End Class
